home *** CD-ROM | disk | FTP | other *** search
/ Star Festival... a Return to Japan / Star Festival... a Return to Japan.iso / pc / STARFESTIVAL / Map-hig.dir / 00048.ls < prev    next >
Encoding:
Text File  |  1999-04-08  |  966 b   |  36 lines
  1. on idle
  2.   global gCursorReady
  3.   if gCursorReady = 1 then
  4.     cursor(200)
  5.     checkCursors()
  6.     set the locH of sprite 48 to the mouseH
  7.     set the locV of sprite 48 to the mouseV
  8.     updateStage()
  9.   end if
  10. end
  11.  
  12. on checkCursors
  13.   global gMagCursor
  14.   set the castNum of sprite 48 to the number of member "curs1"
  15.   if rollOver(2) then
  16.     set the castNum of sprite 48 to the number of member "hotCursor"
  17.   end if
  18.   repeat with i = 9 to 16
  19.     if rollOver(i) then
  20.       set the castNum of sprite 48 to the number of member "hotCursor"
  21.     end if
  22.   end repeat
  23.   if rollOver(20) then
  24.     set the castNum of sprite 48 to the number of member "hotCursor"
  25.   end if
  26.   if rollOver(22) then
  27.     set the castNum of sprite 48 to the number of member "deMagCursor"
  28.   end if
  29.   if rollOver(46) then
  30.     set the castNum of sprite 48 to the number of member "hotCursor"
  31.   end if
  32.   if rollOver(47) then
  33.     set the castNum of sprite 48 to the number of member "hotCursor"
  34.   end if
  35. end
  36.